home *** CD-ROM | disk | FTP | other *** search
- Status: R
-
- Article 19 of alt.sources.patches:
- Path: world!xylogics!bu.edu!snorkelwacker!usc!zaphod.mps.ohio-state.edu!math.lsa.umich.edu!emv
- >From: linden@natasha.fwi.uva.nl (Onno van der Linden)
- Newsgroups: alt.sources.patches
- Subject: [comp.sources.bugs] lharc fixes
- Message-ID: <11465@stag.math.lsa.umich.edu>
- Date: 20 Mar 90 20:13:11 GMT
- Sender: news@math.lsa.umich.edu
- Reply-To: linden@natasha.fwi.uva.nl (Onno van der Linden)
- Followup-To: comp.sources.bugs
- Lines: 146
- X-Original-Newsgroups: comp.sources.bugs
-
- Original-posting-by: linden@natasha.fwi.uva.nl (Onno van der Linden)
- Original-subject: lharc fixes
- Reposted-by: emv@math.lsa.umich.edu (Edward Vielmetti)
-
- [This is a patch to lharc from comp.sources.bugs.]
-
-
-
- Recently,Harry Langenbacher wrote in the last couple of lines
- of his posting:
-
- >
- >Does anyone know how to get lharc to handle directory names without barfing ?
- >
- >thanx
- >
- >
- >- Harry Langenbacher 818-354-9513
- >harry%neuron1@jpl-mil.jpl.nasa.gov
- >harry@neuron1.jpl.nasa.gov 128.149.12.7
-
- Well, below are the diffs I made for lharc.c and it seems to work OK
- on a SUN-4 (SPARCstation 1,to be more specific).
-
- Onno van der Linden
- linden@fwi.uva.nl
-
- --------------------------cut here-------------------------------
-
- *** lharc.c Tue Mar 20 10:37:30 1990
- --- old/lharc.c Mon Mar 12 10:38:06 1990
- ***************
- *** 24,30 ****
- #include <profile.h>
- #endif
-
- ! /* #define STRICT */
- #define FASTCOPY
-
- #ifdef MSDOS
- --- 24,30 ----
- #include <profile.h>
- #endif
-
- ! #define STRICT
- #define FASTCOPY
-
- #ifdef MSDOS
- ***************
- *** 320,326 ****
- char *myname;
-
-
- ! void userbreak()
- {
- error("Interrupt.");
- }
- --- 320,326 ----
- char *myname;
-
-
- ! void userbreak(void)
- {
- error("Interrupt.");
- }
- ***************
- *** 459,477 ****
-
- print_tiny_usage_and_exit ()
- {
- ! printf("\nC-LHarc for %s Version 1.00 (C) 1989-1990 Y.Tagawa, Kai Uwe Rommel\n\
- ! \nUsage: %s {axevlufdmctp}[qnftv] archive_file [files or directories...]\n", SYSNAME, myname);
- ! printf("\nCommands: Options:\n\
- ! a Append q quiet\n\
- ! x,e EXtract n no execute\n\
- ! v,l View/List f force (over write at extract)\n\
- ! u Update t files are TEXT files\n\
- ! f Freshen v<pager> use file pager for p command\n\
- ! d Delete\n\
- ! m Move\n\
- ! c re-Construct new archive\n\
- ! t Test archive\n\
- ! p Print to STDOUT\n");
- exit (1);
- }
-
- --- 459,478 ----
-
- print_tiny_usage_and_exit ()
- {
- ! printf("\nC-LHarc for %s Version 1.00 (C) 1989-1990 Y.Tagawa, Kai Uwe Rommel\n"
- ! "\nUsage: %s {axevlufdmctp}[qnftv] archive_file [files or directories...]\n",
- ! SYSNAME, myname);
- ! printf("\nCommands: Options:\n"
- ! " a Append q quiet\n"
- ! " x,e EXtract n no execute\n"
- ! " v,l View/List f force (over write at extract)\n"
- ! " u Update t files are TEXT files\n"
- ! " f Freshen v<pager> use file pager for p command\n"
- ! " d Delete\n"
- ! " m Move\n"
- ! " c re-Construct new archive\n"
- ! " t Test archive\n"
- ! " p Print to STDOUT\n");
- exit (1);
- }
-
- ***************
- *** 1956,1964 ****
- if (noexec)
- fprintf (stderr, "APPEND %s\n", name);
- else
- ! /* #ifdef STRICT */
- if ( !directory )
- ! /* #endif */
- if ( !update_freshen || (cmp == 0) )
- append_one (fp, nafp, &hdr);
- }
- --- 1957,1965 ----
- if (noexec)
- fprintf (stderr, "APPEND %s\n", name);
- else
- ! #ifdef STRICT
- if ( !directory )
- ! #endif
- if ( !update_freshen || (cmp == 0) )
- append_one (fp, nafp, &hdr);
- }
- ***************
- *** 2041,2048 ****
- #define O_BINARY 0
- #endif
-
- ! copy_archive(src,dst)
- ! char *src,*dst;
- {
- int ih, oh;
- unsigned chunk;
- --- 2042,2048 ----
- #define O_BINARY 0
- #endif
-
- ! copy_archive(char *src, char *dst)
- {
- int ih, oh;
- unsigned chunk;
-